Revista CD Expert 37/CD Expert nº 37.iso/LastCall/lastcall.exe/stuff/pour.dxr/00003_Rollover for help.ls

Text File | 2000-03-23 | 462 b | 20 lines

on mouseEnter me
  global gDrinkContentSpr
  myRect = (the activeWindow).rect
  stageRect = (the stage).rect
  tipLoc = point(myRect.left - stageRect.left, myRect.bottom - stageRect.top + 5)
  if the stage <> the activeWindow then
    tell the stage
      showToolTip(sprite(me.spriteNum), #pourmeter, tipLoc, 1)
    end tell
  end if
end

on mouseLeave me
  if the stage <> the activeWindow then
    tell the stage
      hideToolTip()
    end tell
  end if
end